inherited sprMeterTypes: TsprMeterTypes
  Caption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082' '#1090#1080#1087#1086#1074' '#1089#1095#1077#1090#1095#1080#1082#1086#1074
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel2: TPanel
    Top = 25
    Height = 529
    inherited PageControl1: TPageControl
      Height = 529
      inherited tsTab: TTabSheet
        inherited GroupBox3: TGroupBox
          Height = 501
          inherited dbgRefer: TDBGridEh
            Height = 484
            RowDetailPanel.Active = True
            OnKeyUp = dbgReferKeyUp
            Columns = <
              item
                EditButtons = <>
                FieldName = 'ID'
                Footers = <>
              end
              item
                EditButtons = <>
                FieldName = 'NAME'
                Footers = <>
                Width = 281
              end
              item
                EditButtons = <>
                FieldName = 'CAPACITY'
                Footers = <>
              end
              item
                EditButtons = <>
                FieldName = 'PRECIS'
                Footers = <>
              end
              item
                EditButtons = <>
                FieldName = 'PERIOD'
                Footers = <>
              end>
            inherited RowDetailData: TRowDetailPanelControlEh
              object dbgDetail: TDBGridEh
                Left = 0
                Top = 0
                Width = 521
                Height = 118
                Align = alClient
                DataGrouping.GroupLevels = <>
                DataSource = dscDetail
                Flat = True
                FooterColor = clWindow
                FooterFont.Charset = DEFAULT_CHARSET
                FooterFont.Color = clWindowText
                FooterFont.Height = -11
                FooterFont.Name = 'MS Sans Serif'
                FooterFont.Style = []
                Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
                OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghDblClickOptimizeColWidth, dghDialogFind, dghColumnResize, dghColumnMove, dghExtendVertLines]
                RowDetailPanel.Color = clBtnFace
                TabOrder = 0
                TitleFont.Charset = DEFAULT_CHARSET
                TitleFont.Color = clWindowText
                TitleFont.Height = -11
                TitleFont.Name = 'MS Sans Serif'
                TitleFont.Style = []
                UseMultiTitle = True
                VTitleMargin = 5
                Columns = <
                  item
                    EditButtons = <>
                    FieldName = 'NAME'
                    Footers = <>
                  end>
                object RowDetailData: TRowDetailPanelControlEh
                end
              end
            end
          end
        end
      end
      inherited tsForm: TTabSheet
        OnShow = tsFormShow
        inherited GroupBox2: TGroupBox
          Top = 0
          Width = 784
          Height = 501
          Align = alClient
          object Label1: TLabel [0]
            Left = 129
            Top = 16
            Width = 17
            Height = 13
            Alignment = taRightJustify
            Caption = #1048#1044
          end
          object Label2: TLabel [1]
            Left = 17
            Top = 40
            Width = 129
            Height = 13
            Alignment = taRightJustify
            AutoSize = False
            Caption = #1053#1072#1079#1074#1072#1085#1080#1077
          end
          object Label3: TLabel [2]
            Left = 17
            Top = 64
            Width = 129
            Height = 13
            Alignment = taRightJustify
            AutoSize = False
            Caption = #1047#1085#1072#1095#1085#1086#1089#1090#1100
          end
          object Label4: TLabel [3]
            Left = 17
            Top = 88
            Width = 129
            Height = 13
            Alignment = taRightJustify
            AutoSize = False
            Caption = #1058#1086#1095#1085#1086#1089#1090#1100
          end
          object Label5: TLabel [4]
            Left = 17
            Top = 112
            Width = 129
            Height = 13
            Alignment = taRightJustify
            AutoSize = False
            Caption = #1055#1077#1088#1080#1086#1076' '#1075#1086#1089#1087#1086#1074#1077#1088#1082#1080' ('#1084#1077#1089')'
          end
          inherited pnlButtons: TPanel
            Top = 466
            Width = 780
            Height = 33
            TabOrder = 5
            inherited SpeedButton1: TSpeedButton
              Left = 581
              Top = 7
            end
            inherited SpeedButton2: TSpeedButton
              Left = 683
              Top = 7
            end
          end
          object DBEditEh1: TDBEditEh
            Left = 151
            Top = 13
            Width = 60
            Height = 19
            AlwaysShowBorder = True
            Color = clInactiveCaptionText
            DataField = 'ID'
            DataSource = dscRefer
            EditButtons = <>
            Enabled = False
            Flat = True
            ReadOnly = True
            TabOrder = 0
            Visible = True
          end
          object dbePrecision: TDBEditEh
            Left = 151
            Top = 85
            Width = 60
            Height = 19
            AlwaysShowBorder = True
            DataField = 'PRECIS'
            DataSource = dscRefer
            EditButtons = <>
            Flat = True
            TabOrder = 3
            Visible = True
          end
          object dbeVarPeriod: TDBEditEh
            Left = 151
            Top = 109
            Width = 60
            Height = 19
            AlwaysShowBorder = True
            DataField = 'PERIOD'
            DataSource = dscRefer
            EditButtons = <>
            Flat = True
            TabOrder = 4
            Visible = True
          end
          object dbeName: TDBEditEh
            Left = 151
            Top = 37
            Width = 217
            Height = 19
            AlwaysShowBorder = True
            DataField = 'NAME'
            DataSource = dscRefer
            EditButtons = <>
            Flat = True
            TabOrder = 1
            Visible = True
          end
          object dbeCapacity: TDBEditEh
            Left = 151
            Top = 61
            Width = 60
            Height = 19
            AlwaysShowBorder = True
            DataField = 'CAPACITY'
            DataSource = dscRefer
            EditButtons = <>
            Flat = True
            TabOrder = 2
            Visible = True
          end
          object GroupBox4: TGroupBox
            Left = 2
            Top = 152
            Width = 780
            Height = 314
            Align = alBottom
            Caption = ' '#1059#1095#1080#1090#1099#1074#1072#1077#1084#1099#1077' '#1091#1089#1083#1091#1075#1080' '
            TabOrder = 6
            object DBGridEh1: TDBGridEh
              Left = 2
              Top = 15
              Width = 320
              Height = 297
              Align = alLeft
              DataGrouping.GroupLevels = <>
              DataSource = dscServiceList
              Flat = True
              FooterColor = clWindow
              FooterFont.Charset = DEFAULT_CHARSET
              FooterFont.Color = clWindowText
              FooterFont.Height = -11
              FooterFont.Name = 'MS Sans Serif'
              FooterFont.Style = []
              Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
              OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghDblClickOptimizeColWidth, dghDialogFind, dghColumnResize, dghColumnMove, dghExtendVertLines]
              RowDetailPanel.Color = clBtnFace
              TabOrder = 0
              TitleFont.Charset = DEFAULT_CHARSET
              TitleFont.Color = clWindowText
              TitleFont.Height = -11
              TitleFont.Name = 'MS Sans Serif'
              TitleFont.Style = []
              UseMultiTitle = True
              VTitleMargin = 5
              Columns = <
                item
                  EditButtons = <>
                  FieldName = 'NAME'
                  Footers = <>
                end>
              object RowDetailData: TRowDetailPanelControlEh
              end
            end
            object Panel1: TPanel
              Left = 322
              Top = 15
              Width = 456
              Height = 297
              Align = alClient
              BevelOuter = bvNone
              TabOrder = 1
              object DBGridEh2: TDBGridEh
                Left = 57
                Top = 0
                Width = 399
                Height = 297
                Align = alClient
                DataGrouping.GroupLevels = <>
                DataSource = dscMeterServiceList
                Flat = True
                FooterColor = clWindow
                FooterFont.Charset = DEFAULT_CHARSET
                FooterFont.Color = clWindowText
                FooterFont.Height = -11
                FooterFont.Name = 'MS Sans Serif'
                FooterFont.Style = []
                Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
                OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghDblClickOptimizeColWidth, dghDialogFind, dghColumnResize, dghColumnMove, dghExtendVertLines]
                RowDetailPanel.Color = clBtnFace
                TabOrder = 0
                TitleFont.Charset = DEFAULT_CHARSET
                TitleFont.Color = clWindowText
                TitleFont.Height = -11
                TitleFont.Name = 'MS Sans Serif'
                TitleFont.Style = []
                UseMultiTitle = True
                VTitleMargin = 5
                Columns = <
                  item
                    EditButtons = <>
                    FieldName = 'NAME'
                    Footers = <>
                  end>
                object RowDetailData: TRowDetailPanelControlEh
                end
              end
              object Panel3: TPanel
                Left = 0
                Top = 0
                Width = 57
                Height = 297
                Align = alLeft
                BevelOuter = bvNone
                TabOrder = 1
                object BitBtn1: TBitBtn
                  Left = 8
                  Top = 8
                  Width = 41
                  Height = 29
                  TabOrder = 0
                  OnClick = BitBtn1Click
                  Glyph.Data = {
                    F6060000424DF606000000000000360000002800000018000000180000000100
                    180000000000C00600009C0E0000C40E00000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    000000000000000000000000000000000000000000000085BAAC000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000034BC9857
                    D7BC3BC09D7AB7A7000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    000000001BBC9266E3CF72E4D058D3B750C0A36DAD9B00000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    00000000000000000000000019B98E56DFC758E0C865E1CC6EE1CC66DAC04ABA
                    9C62AD9600000000000000000000000000000000000000000000000000000000
                    000000000000000000000000000000000000000019B48953DDC451DDC451DCC3
                    52DCC45CDFC872E4CF6CDCC439C19C60B1990000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000019AF8450
                    DBC24FDBC24FDBC14FDBC14FDBC152DCC25CDEC66CE1CC61D5BB4DBFA05EAF96
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000019AB7F4FDAC04ED9BF4ED9BF4ED9BF4ED9BF4ED9BF4ED9BF51DAC059
                    DCC45FDBC44DD1B548B29485BAAC000000000000000000000000000000000000
                    00000000000000000000000016A3753ECEAD3CCDAC3CCDAB3CCDAB3CCDAB3CCD
                    AC3DCEAC40D0B047D2B443CAAA38B08D85BAAC00000000000000000000000000
                    0000000000000000000000000000000000000000159E6F3ACCA939CBA738CBA7
                    38CBA739CBA73DCEAB45D1B241C9A834AF895CA1880000000000000000000000
                    00000000000000000000000000000000000000000000000000000000159A6A38
                    C9A435C8A335C8A237C9A440CEAD46CEAF2CAF86429E7C000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000015946334C8A034C8A13CCCA83FC7A43AB08C4A957700000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000001691603BCBA73DC7A333AB854B9B7C8FAB9F0000
                    0000000000000000000000000000000000000000000000000000000000000000
                    00000000000000000000000000000000000000002C90672EAF8734956E87A99A
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000087
                    A798000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000}
                end
                object BitBtn2: TBitBtn
                  Left = 8
                  Top = 48
                  Width = 41
                  Height = 29
                  TabOrder = 1
                  OnClick = BitBtn2Click
                  Glyph.Data = {
                    36090000424D3609000000000000360000002800000018000000180000000100
                    2000000000000009000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    000000000000000000000000000000000000000000000000000085BAACFF0000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000007AB7A7FF3BC09DFF57D7BCFF34BC
                    98FF000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    000000000000000000006DAD9BFF50C0A3FF58D3B7FF72E4D0FF66E3CFFF1BBC
                    92FF000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    000062AD96FF4ABA9CFF66DAC0FF6EE1CCFF65E1CCFF58E0C8FF56DFC7FF19B9
                    8EFF000000000000000000000000000000000000000000000000000000000000
                    000000000000000000000000000000000000000000000000000060B199FF39C1
                    9CFF6CDCC4FF72E4CFFF5CDFC8FF52DCC4FF51DCC3FF51DDC4FF53DDC4FF19B4
                    89FF000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000005EAF96FF4DBFA0FF61D5BBFF6CE1
                    CCFF5CDEC6FF52DCC2FF4FDBC1FF4FDBC1FF4FDBC1FF4FDBC2FF50DBC2FF19AF
                    84FF000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000085BAACFF48B294FF4DD1B5FF5FDBC4FF59DCC4FF51DA
                    C0FF4ED9BFFF4ED9BFFF4ED9BFFF4ED9BFFF4ED9BFFF4ED9BFFF4FDAC0FF19AB
                    7FFF000000000000000000000000000000000000000000000000000000000000
                    000000000000000000000000000085BAACFF38B08DFF43CAAAFF47D2B4FF40D0
                    B0FF3DCEACFF3CCDACFF3CCDABFF3CCDABFF3CCDABFF3CCDACFF3ECEADFF16A3
                    75FF000000000000000000000000000000000000000000000000000000000000
                    000000000000000000000000000000000000000000005CA188FF34AF89FF41C9
                    A8FF45D1B2FF3DCEABFF39CBA7FF38CBA7FF38CBA7FF39CBA7FF3ACCA9FF159E
                    6FFF000000000000000000000000000000000000000000000000000000000000
                    000000000000000000000000000000000000000000000000000000000000429E
                    7CFF2CAF86FF46CEAFFF40CEADFF37C9A4FF35C8A2FF35C8A3FF38C9A4FF159A
                    6AFF000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000004A9577FF3AB08CFF3FC7A4FF3CCCA8FF34C8A1FF34C8A0FF1594
                    63FF000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    000000000000000000008FAB9FFF4B9B7CFF33AB85FF3DC7A3FF3BCBA7FF1691
                    60FF000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    00000000000000000000000000000000000087A99AFF34956EFF2EAF87FF2C90
                    67FF000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    000000000000000000000000000000000000000000000000000087A798FF0000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000000000000000
                    0000000000000000000000000000000000000000000000000000}
                end
              end
            end
          end
        end
      end
    end
  end
  inherited GroupBox1: TGroupBox
    Height = 0
  end
  inherited dsRefer: TpFIBDataSet
    UpdateSQL.Strings = (
      'UPDATE METER_TYPES'
      'SET '
      '    NAME = :NAME,'
      '    CAPACITY = :CAPACITY,'
      '    PERIOD = :PERIOD,'
      '    UNIT_ID = :UNIT_ID,'
      '    PRECIS = :PRECIS,'
      '    SINGLE_ONLY = :SINGLE_ONLY'
      'WHERE'
      '    ID = :OLD_ID'
      '    ')
    DeleteSQL.Strings = (
      'DELETE FROM'
      '    METER_TYPES'
      'WHERE'
      '        ID = :OLD_ID'
      '    ')
    InsertSQL.Strings = (
      'INSERT INTO METER_TYPES('
      '    ID,'
      '    NAME,'
      '    CAPACITY,'
      '    PERIOD,'
      '    UNIT_ID,'
      '    PRECIS,'
      '    SINGLE_ONLY'
      ')'
      'VALUES('
      '    :ID,'
      '    :NAME,'
      '    :CAPACITY,'
      '    :PERIOD,'
      '    :UNIT_ID,'
      '    :PRECIS,'
      '    :SINGLE_ONLY'
      ')'
      'returning id')
    RefreshSQL.Strings = (
      'select * from meter_types mt'
      ''
      ' WHERE '
      '        MT.ID = :OLD_ID'
      '    ')
    SelectSQL.Strings = (
      'select * from meter_types mt')
    UpdateTransaction = trRefer
    object dsReferID: TFIBIntegerField
      DisplayLabel = #1048#1044
      FieldName = 'ID'
    end
    object dsReferNAME: TFIBStringField
      DisplayLabel = #1053#1072#1079#1074#1072#1085#1080#1077' '#1090#1080#1087#1072
      FieldName = 'NAME'
      Size = 16
      EmptyStrToNull = True
    end
    object dsReferCAPACITY: TFIBIntegerField
      DisplayLabel = #1047#1085#1072#1095#1085#1086#1089#1090#1100
      FieldName = 'CAPACITY'
    end
    object dsReferPRECIS: TFIBIntegerField
      DisplayLabel = #1058#1086#1095#1085#1086#1089#1090#1100
      FieldName = 'PRECIS'
    end
    object dsReferPERIOD: TFIBIntegerField
      DisplayLabel = #1055#1077#1088#1080#1086#1076' '#1087#1086#1074#1077#1088#1082#1080
      FieldName = 'PERIOD'
    end
  end
  inherited dscRefer: TDataSource
    Top = 352
  end
  inherited PropStorage: TPropStorageEh
    Section = 'sprMeterTypes'
  end
  object dsServiceList: TpFIBDataSet
    SelectSQL.Strings = (
      'select s.id, s.name from vw_straits v'
      '  join services s on s.id = v.service_id'
      '    and s.group_id = 0'
      '    and v.code = '#39'CAN_METER'#39
      '    and not exists (select 1 from meter_types2service mts'
      
        '        where mts.group_id = s.id and mts.meter_type = :pmeter_t' +
        'ype)')
    BeforeOpen = dsServiceListBeforeOpen
    Transaction = trRefer
    Database = MAINDM.pMainDatabase
    Left = 174
    Top = 289
    object dsServiceListID: TFIBIntegerField
      FieldName = 'ID'
    end
    object dsServiceListNAME: TFIBStringField
      DisplayLabel = #1044#1086#1089#1090#1091#1087#1085#1099#1077' '#1091#1089#1083#1091#1075#1080
      DisplayWidth = 30
      FieldName = 'NAME'
      Size = 120
      EmptyStrToNull = True
    end
  end
  object dsMeterServiceList: TpFIBDataSet
    DeleteSQL.Strings = (
      'DELETE FROM METER_TYPES2SERVICE'
      'WHERE GROUP_ID = :OLD_GROUP_ID'
      '  and METER_TYPE = :OLD_METER_TYPE        ')
    InsertSQL.Strings = (
      'INSERT INTO METER_TYPES2SERVICE('
      '    GROUP_ID,'
      '    METER_TYPE'
      ')'
      'VALUES('
      '    :GROUP_ID,'
      '    :METER_TYPE'
      ')')
    RefreshSQL.Strings = (
      'select mts.group_id, mts.meter_type, s.name from services s'
      '  join meter_types2service mts on mts.group_id = s.id'
      '    and mts.meter_type = :pmeter_type'
      '    and mts.group_id = :OLD_GROUP_ID')
    SelectSQL.Strings = (
      'select mts.group_id, mts.meter_type, s.name from services s'
      '  join meter_types2service mts on mts.group_id = s.id'
      '    and mts.meter_type = :pmeter_type')
    BeforeOpen = dsMeterServiceListBeforeOpen
    Transaction = trRefer
    Database = MAINDM.pMainDatabase
    Left = 488
    Top = 296
    object dsMeterServiceListNAME: TFIBStringField
      DisplayLabel = #1053#1072#1079#1085#1072#1095#1077#1085#1085#1099#1077' '#1091#1089#1083#1091#1075#1080
      DisplayWidth = 30
      FieldName = 'NAME'
      Size = 120
      EmptyStrToNull = True
    end
    object dsMeterServiceListGROUP_ID: TFIBIntegerField
      FieldName = 'GROUP_ID'
    end
    object dsMeterServiceListMETER_TYPE: TFIBIntegerField
      FieldName = 'METER_TYPE'
    end
  end
  object dscServiceList: TDataSource
    DataSet = dsServiceList
    Left = 174
    Top = 321
  end
  object dscMeterServiceList: TDataSource
    DataSet = dsMeterServiceList
    Left = 488
    Top = 328
  end
  object dsDetail: TpFIBDataSet
    DeleteSQL.Strings = (
      'DELETE FROM METER_TYPES2SERVICE'
      'WHERE GROUP_ID = :OLD_GROUP_ID'
      '  and METER_TYPE = :OLD_METER_TYPE        ')
    InsertSQL.Strings = (
      'INSERT INTO METER_TYPES2SERVICE('
      '    GROUP_ID,'
      '    METER_TYPE'
      ')'
      'VALUES('
      '    :GROUP_ID,'
      '    :METER_TYPE'
      ')')
    RefreshSQL.Strings = (
      'select mts.group_id, mts.meter_type, s.name from services s'
      '  join meter_types2service mts on mts.group_id = s.id'
      '    and mts.meter_type = :pmeter_type'
      '    and mts.group_id = :OLD_GROUP_ID')
    SelectSQL.Strings = (
      'select s.name from services s'
      '  join meter_types2service mts on mts.group_id = s.id'
      '    and mts.meter_type = :ID')
    BeforeOpen = dsMeterServiceListBeforeOpen
    Transaction = trLists
    Database = MAINDM.pMainDatabase
    DataSource = dscRefer
    Left = 56
    Top = 320
    WaitEndMasterScroll = True
    dcForceOpen = True
    object FIBStringField1: TFIBStringField
      DisplayLabel = #1059#1095#1080#1090#1099#1074#1072#1077#1084#1099#1077' '#1091#1089#1083#1091#1075#1080
      DisplayWidth = 30
      FieldName = 'NAME'
      Size = 120
      EmptyStrToNull = True
    end
  end
  object dscDetail: TDataSource
    DataSet = dsDetail
    Left = 56
    Top = 352
  end
end
